//切换工作目录与导入初始数据
cd "D:\Document\doing\主动与被动信息披露——基于股份回购与机构调研"
/*
import excel "D:\Document\doing\主动与被动信息披露——基于股份回购与机构调研\股份回购预案.xls", sheet("股份回购预案") firstrow clear
save "股份回购预案.dta",replace
*/
use "股份回购预案.dta",clear
codebook 回购进度 if Year>2017 & Year<=2019
codebook 回购进度 if year( 预案公告日期)==2018
codebook 回购进度 if year( 预案公告日期)==2019
codebook 回购进度 if year( 预案公告日期)==2020

//画图
gen Year = year(预案公告日期)
gen Month = month(预案公告日期)
bysort Year: egen 年度股份回购预案次数 = count(代码)
duplicates drop Year,force
format 预案公告日期 %tdCCYY
twoway (bar 年度股份回购预案次数 Year), ytitle(年度股份回购预案次数) ylabel(, labels labcolor(black%80)) xlabel(, labels) title(年度股份回购预案次数, size(medlarge)) caption(数据来源：东方财富Choice数据库) scheme(sj) xsize(20) ysize(15)

graph export "D:\Document\doing\主动与被动信息披露——基于股份回购与机构调研\图表\年度股份回购预案次数.png", as(png) name("Graph") replace

/*
import excel "D:\Document\doing\主动与被动信息披露——基于股份回购与机构调研\股份回购实施.xls", firstrow clear
save "股份回购实施.dta",replace
    */
use "股份回购实施.dta",clear


